Inference at * 1 1 4 1 
Iof proof for Lemma decidable atom equal:

.....subterm..... T:t1:n

1. a : Atom
2. b : Atom
3. (a = b)
  (x.x)  ((a = b)) 

latex

 by ((Unfold `not` 0) 
CollapseTHEN (MemCD)) 

latex

C1: .....subterm..... T:t1:n

C1: 4. x : a = b
C1:   x  False
C2: .....eq aux..... NILNIL

C2:   (a = b)  Type
C.

Definitions

P  Q, t  T, A